package com.qd.panda.service.park;

import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.cdqidi.constant.ConstantDto;
import com.cdqidi.db.BaseService;
import com.cdqidi.dto.CacheKey;
import com.cdqidi.exception.ApiException;
import com.cdqidi.util.RedisTemplateUtil;
import com.fasterxml.jackson.core.JsonProcessingException;
import com.fasterxml.jackson.databind.JsonNode;
import com.fasterxml.jackson.databind.ObjectMapper;
import com.qd.common.panda.domain.entity.carpark.CarParkChargeFeeDTO;
import com.qd.common.panda.domain.entity.feetime.BaseFeeTimeDTO;
import com.qd.common.panda.domain.entity.feetime.FeeTim1DTO;
import com.qd.common.panda.domain.enums.ChargeFeeParkTimeRuleEnum;
import com.qd.panda.mapper.park.CarParkChargeFeeMapper;
import com.qd.panda.model.CarParkChargeFee;
import com.qd.pandaparkflow.bean.ChargeFeeParkTimeReqVO;
import lombok.RequiredArgsConstructor;
import lombok.extern.slf4j.Slf4j;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.StringUtils;

import java.math.BigDecimal;
import java.time.LocalDateTime;
import java.util.*;

import static java.util.stream.Collectors.toList;

/**
 * 免费停车设置
 *
 * @author sjk
 */
@RequiredArgsConstructor
@Service
@Slf4j
public class CarParkChargeFeeService extends BaseService<CarParkChargeFeeMapper, CarParkChargeFee> {

    private static final String PREFIX_ID = "panda_car_park_charge_fee_sid_{0}";
    private static final String PREFIX_UNIQUE_PANDA_CAR = "panda_car_park_charge_fee_pId_{0}";

    private final RedisTemplateUtil<CarParkChargeFee> redisTemplateUtil;
    private final ObjectMapper objectMapper;
//    @Resource
//    private final FlowExecutor flowExecutor;

    /**
     * 保存
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public CarParkChargeFeeDTO save(CarParkChargeFeeDTO dto) {
        checkUnique(dto);
        final CarParkChargeFee model = dtoToModel(dto);
        try {
            if (super.save(model)) {
                return modelToDto(model);
            }
            throw new ApiException("添加失败");
        } finally {
            clearCache(model);
            model.freeData();
        }
    }

    /**
     * 修改
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public CarParkChargeFeeDTO update(CarParkChargeFeeDTO dto) {
        checkUnique(dto);
        final CarParkChargeFee historyModel = Optional.ofNullable(getById(dto.getSid())).orElseThrow(() -> new ApiException("ID不存在,不能更新"));
        final CarParkChargeFee model = dtoToModel(dto);
        try {
            if (super.updateById(model)) {
                return modelToDto(model);
            }
            throw new ApiException("更新失败");
        } finally {
            clearCache(historyModel);
            clearCache(model);
            historyModel.freeData();
            model.freeData();
        }
    }

    /**
     * 批量添加
     *
     * @param mList 数据库对象
     */
    @Transactional(rollbackFor = Exception.class)
    public void saveBatch(List<CarParkChargeFee> mList) {
        try {
            if (!super.saveBatch(mList)) {
                throw new ApiException("批量添加失败");
            }
        } finally {
            clearCaches(mList);
        }
    }

    /**
     * 批量更新
     *
     * @param mList 数据库对象
     */
    @Transactional(rollbackFor = Exception.class)
    public void updateBatchIds(List<CarParkChargeFee> mList) {
        final List<String> ids = mList.stream().map(CarParkChargeFee::getSid).collect(toList());
        final List<CarParkChargeFee> historyModelList = checkIds(ids);
        try {
            if (!super.updateBatchById(mList)) {
                throw new ApiException("批量更新失败");
            }
        } finally {
            clearCaches(historyModelList);
            historyModelList.clear();
            ids.clear();
        }
    }

    /**
     * 删除，单个
     *
     * @param sid 主键
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeById(String sid) {
        final CarParkChargeFee historyModel = Optional.ofNullable(getById(sid)).orElseThrow(() -> new ApiException("数据不存在,不能删除"));
        try {
            if (!super.removeById(sid)) {
                throw new ApiException("删除失败");
            }
        } finally {
            clearCache(historyModel);
            historyModel.freeData();
        }
    }

    /**
     * 批量删除
     *
     * @param ids 主键集合
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeBatchIds(List<String> ids) {
        final List<CarParkChargeFee> historyModelList = checkIds(ids);
        try {
            if (!super.removeByIds(ids)) {
                throw new ApiException("批量删除失败");
            }
        } finally {
            clearCaches(historyModelList);
            historyModelList.clear();
        }
    }

    /**
     * 根据传入对象构建查询参数，判断是否存在
     *
     * @param dto 参数
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExists(CarParkChargeFeeDTO dto) {
        final QueryWrapper<CarParkChargeFee> queryWrapper = createQueryWrapper(dto);
        final boolean exists = super.count(queryWrapper) > 0;
        queryWrapper.clear();
        return exists;
    }

    /**
     * 根据主键判断数据是否存在
     *
     * @param sid 主键
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExistsById(String sid) {
        boolean exists = false;
        if (StringUtils.hasLength(sid)) {
            final CarParkChargeFee model = getById(sid);
            exists = (null != model);
            if (exists) {
                model.freeData();
            }
        }
        return exists;
    }

    /**
     * 根据主键获取数据
     *
     * @param sid 主键
     * @return 单条记录
     */
    @Transactional(readOnly = true)
    public CarParkChargeFee getById(String sid) {
        final String key = RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, sid);
        return redisTemplateUtil.get(new CacheKey().setKey(key).setTimeout(ConstantDto.REDIS_TIME_OUT_DAY), () -> super.getById(sid), CarParkChargeFee.class);
    }

    /**
     * 根据主键获取数据
     *
     * @param sid 主键
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public CarParkChargeFeeDTO getByIdDto(String sid) {
        return Optional.ofNullable(getById(sid)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录
     */
    @Transactional(readOnly = true)
    public CarParkChargeFee getOne(CarParkChargeFeeDTO dto) {
        final QueryWrapper<CarParkChargeFee> queryWrapper = createQueryWrapper(dto);
        CarParkChargeFee model = super.getOne(queryWrapper);
        queryWrapper.clear();
        return model;
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public CarParkChargeFeeDTO getOneDto(CarParkChargeFeeDTO dto) {
        return Optional.ofNullable(getOne(dto)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据
     */
    @Transactional(readOnly = true)
    public List<CarParkChargeFee> getList(CarParkChargeFeeDTO dto) {
        final QueryWrapper<CarParkChargeFee> queryWrapper = createQueryWrapper(dto);
        final List<CarParkChargeFee> list = super.list(queryWrapper);
        queryWrapper.clear();
        return list;
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据，转换成页面对象
     */
    @Transactional(readOnly = true)
    public List<CarParkChargeFeeDTO> getListDto(CarParkChargeFeeDTO dto) {
        return modelToDtoList(getList(dto));
    }

    /**
     * 根据唯一性索引获得数据
     * param pId
     *
     * @return 单条数据
     */
    @Transactional(readOnly = true)
    public CarParkChargeFee getUniqueByPId(String pId) {
        final QueryWrapper<CarParkChargeFee> queryWrapper = new QueryWrapper<>();
        queryWrapper.eq("p_id", pId);
        final String key = RedisTemplateUtil.getRedisCacheKey(PREFIX_UNIQUE_PANDA_CAR, pId);
        final CarParkChargeFee model = redisTemplateUtil.get(new CacheKey().setKey(key).setTimeout(ConstantDto.REDIS_TIME_OUT_DAY), () -> super.getOne(queryWrapper, false), CarParkChargeFee.class);
        queryWrapper.clear();
        return model;
    }

    /**
     * 验证唯一性索引
     *
     * @param dto 页面对象
     */
    private void checkUnique(CarParkChargeFeeDTO dto) {
        CarParkChargeFee model = getUniqueByPId(dto.getPId());
        if (null != model) {
            checkUnique(dto, model);
        }
    }

    /**
     * 验证唯一性索引
     *
     * @param dto   页面对象
     * @param model 根据约束字段查询出来的数据库对象
     */
    private void checkUnique(CarParkChargeFeeDTO dto, CarParkChargeFee model) {
        if (!StringUtils.hasLength(dto.getSid())) {
            throw new ApiException("数据已存在，请勿重复添加");
        }
        if (!dto.getSid().equals(model.getSid())) {
            throw new ApiException("数据已存在，请勿重复添加");
        }
    }

    /**
     * 清空缓存
     *
     * @param model 数据库对象
     */
    public void clearCache(CarParkChargeFee model) {
        if (null == model) {
            return;
        }
        redisTemplateUtil.deleteByKey(RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getSid()));
        redisTemplateUtil.deleteByKey(RedisTemplateUtil.getRedisCacheKey(PREFIX_UNIQUE_PANDA_CAR, model.getPId()));
    }

    /**
     * 批量清空缓存
     *
     * @param list 数据库对象
     */
    public void clearCaches(List<CarParkChargeFee> list) {
        if (null == list || list.isEmpty()) {
            return;
        }
        List<String> ids = list.stream().map(model -> RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getSid())).collect(toList());
        if (!ids.isEmpty()) {
            redisTemplateUtil.deleteByKey(ids);
            ids.clear();
        }
        List<String> uniqueIds = list.stream().map(model -> RedisTemplateUtil.getRedisCacheKey(PREFIX_UNIQUE_PANDA_CAR, model.getPId())).collect(toList());
        if (!uniqueIds.isEmpty()) {
            redisTemplateUtil.deleteByKey(uniqueIds);
            uniqueIds.clear();
        }
    }

    /**
     * 数据库对象转页面对象
     *
     * @param model 数据库对象
     * @return 页面对象
     */
    public CarParkChargeFeeDTO modelToDto(CarParkChargeFee model) {
        if (null == model) {
            return null;
        }
        final CarParkChargeFeeDTO dto = new CarParkChargeFeeDTO();
        dto.setSid(model.getSid());
        dto.setNote(model.getNote());
        Optional.ofNullable(model.getRule()).ifPresent(r -> {
            try {
                JsonNode jsonNode = objectMapper.readTree(r);
                dto.setRule(jsonNode);
            } catch (JsonProcessingException e) {
                throw new ApiException(e);
            }
        });
        dto.setPId(model.getPId());
        dto.setFeeTimeId(model.getFeeTimeId());
        buildDisplay(dto);
        return dto;
    }

    /**
     * 页面对象转数据库对象
     *
     * @param dto 页面对象
     * @return 数据库对象
     */
    public CarParkChargeFee dtoToModel(CarParkChargeFeeDTO dto) {
        if (null == dto) {
            return null;
        }
        final CarParkChargeFee model = new CarParkChargeFee();
        model.setSid(dto.getSid());
        model.setNote(dto.getNote());
        Optional.ofNullable(dto.getRule()).ifPresent(r -> model.setRule(r.toString()));
        model.setPId(dto.getPId());
        model.setFeeTimeId(dto.getFeeTimeId());
        return model;
    }

    /**
     * 码表转换
     *
     * @param dto 页面对象
     */
    public void buildDisplay(CarParkChargeFeeDTO dto) {

    }

    /**
     * 数据库对象转页面对象
     *
     * @param list 数据库对象
     * @return 页面对象
     */
    public List<CarParkChargeFeeDTO> modelToDtoList(List<CarParkChargeFee> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::modelToDto).collect(toList());
    }

    /**
     * 页面对象转数据库对象
     *
     * @param list 页面对象
     * @return 数据库对象
     */
    public List<CarParkChargeFee> dtoToModelList(List<CarParkChargeFeeDTO> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::dtoToModel).collect(toList());
    }

    /**
     * 拼装查询参数，除了主键的其他字段会自动加入进来
     *
     * @param dto 查询参数，不为空的属性会被自动加入
     */
    public QueryWrapper<CarParkChargeFee> createQueryWrapper(CarParkChargeFeeDTO dto) {
        return createQueryWrapper(dto, "");
    }

    /**
     * 拼装查询参数，除了主键的其他字段会自动加入进来
     *
     * @param dto        查询参数，不为空的属性会被自动加入
     * @param tableAlias 表别名
     */
    public QueryWrapper<CarParkChargeFee> createQueryWrapper(CarParkChargeFeeDTO dto, String tableAlias) {
        final QueryWrapper<CarParkChargeFee> queryWrapper = new QueryWrapper<>();
        if (null != dto) {
            if (StringUtils.hasLength(tableAlias) && tableAlias.charAt(tableAlias.length() - 1) != '.') {
                tableAlias += ".";
            }
            if (StringUtils.hasLength(dto.getNote())) {
                queryWrapper.eq(tableAlias + "note", dto.getNote());
            }
            if (StringUtils.hasLength(dto.getPId())) {
                queryWrapper.eq(tableAlias + "p_id", dto.getPId());
            }
            if (StringUtils.hasLength(dto.getFeeTimeId())) {
                queryWrapper.eq(tableAlias + "fee_time_id", dto.getFeeTimeId());
            }
        }
        return queryWrapper;
    }

    /**
     * 批量检查主键在数据库中是否存在
     *
     * @param ids 主键集合
     * @return 主键查询出来的集合
     */
    public List<CarParkChargeFee> checkIds(List<String> ids) {
        if (null == ids || ids.isEmpty()) {
            throw new ApiException("ids不能为空");
        }
        final List<CarParkChargeFee> list = super.listByIds(ids);
        if (list.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(ids.toArray()));
        }
        if (ids.size() == list.size()) {
            return list;
        }
        List<String> dbIds = list.stream().map(CarParkChargeFee::getSid).collect(toList());
        final List<String> notExistsList = ids.stream().filter(id -> !dbIds.contains(id)).collect(toList());
        dbIds.clear();
        if (!notExistsList.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(notExistsList.toArray()));
        }
        return list;
    }

    @Transactional(readOnly = true)
    public Integer getParkFeeTime(String parkId, LocalDateTime start, LocalDateTime end, BigDecimal amount) {
        CarParkChargeFee carParkChargeFee = Optional.ofNullable(getUniqueByPId(parkId)).orElseThrow(() -> new ApiException("没有设置充电免费停车时长"));
        CarParkChargeFeeDTO carParkChargeFeeDTO = modelToDto(carParkChargeFee);
        BaseFeeTimeDTO feeTime = getFeeTime(carParkChargeFeeDTO.getFeeTimeId(), carParkChargeFeeDTO.getRule());
        ChargeFeeParkTimeReqVO req = new ChargeFeeParkTimeReqVO().setFeeTimeRules(Collections.singletonList(feeTime)).setFeeTimeId(carParkChargeFeeDTO.getFeeTimeId());
        if (null != start) {
            req.setStartTime(start);
        }
        if (null != end) {
            req.setEndTime(end);
        }
        if (null != amount) {
            req.setAmount(amount);
        }
//        LiteflowResponse response = flowExecutor.execute2Resp(carParkChargeFeeDTO.getFeeTimeId(), req, ChargeFeeParkTimeContext.class);
//        if (null != response.getCause()) {
//            throw new ApiException(response.getCause().getMessage());
//        }
//        return response.getContextBean(ChargeFeeParkTimeContext.class).getFeeTime();
        return 15;
    }

    public BaseFeeTimeDTO getFeeTime(String feeTimeRule, JsonNode rule) {
        BaseFeeTimeDTO baseRuleDTO;
        try {
            if (Objects.requireNonNull(ChargeFeeParkTimeRuleEnum.getByValue(feeTimeRule)) == ChargeFeeParkTimeRuleEnum.FEE_PARK_TIME1) {
                baseRuleDTO = objectMapper.readValue(rule.toString(), FeeTim1DTO.class);
            } else {
                throw new ApiException("计费规则不存在");
            }
        } catch (Exception e) {
            e.printStackTrace();
            throw new ApiException("参数错误");
        }
        return baseRuleDTO;
    }
}